Imports System.Windows.Forms
Imports Microsoft.InteropFormTools

<InteropForm()> _
Public Class InteropForm1

    Private myFormularText As String

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MessageBox.Show(FormularText)
    End Sub

    <InteropFormMethod()> _
    Public Sub EineMethode()

    End Sub

    <InteropFormProperty()> _
    Public Property FormularText() As String
        Get
            Return myFormularText
        End Get
        Set(ByVal value As String)
            myFormularText = value
        End Set
    End Property

End Class